home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / jazlib.arc / JZINKEY.ASM < prev    next >
Assembly Source File  |  1988-12-18  |  322b  |  24 lines
  1.     assume cs:_text
  2. _text    segment public byte 'code'
  3.     public _jzinkey
  4.  
  5. _jzinkey   proc near
  6.  
  7.     push bp
  8.     mov bp,sp
  9.     mov ah,0
  10.     int 16h     ; get scan code
  11.     push ax
  12.     pop cx        ; save scan in cx
  13.     xchg ah,al
  14.     mov ah,0
  15.     mov bx,[bp+4]
  16.     mov [bx],ax
  17.     mov al,cl
  18.     mov sp,bp
  19.     pop bp
  20.     ret
  21. _jzinkey   endp
  22. _text    ends
  23. end
  24.